From a226fcfce23ff41d52cdf1a43597833ed8efc070 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Fri, 30 Mar 2001 00:52:54 +0000 Subject: [PATCH] (interactive-form): Fix paren typo. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index 67f9b83887d..ffb6f7f0ca6 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1468,7 +1468,7 @@ If function is a command (see `commandp'), value is a list of the form (when (stringp (car function)) (setq function (cdr function))) (let ((form (car function))) - (when (eq (car-safe form 'interactive)) + (when (eq (car-safe form) 'interactive) (copy-sequence form))))))) (defun assq-delete-all (key alist) -- 2.30.2